The objective of this is to eventually create a ShinyApp for my English Class. The idea was that anyone who wanted to learn something about tsunamis will be able to read through it. The target demographic is anyone from 30-40 with little to no vision problems.
Tsunamis are super-interesting, because unlike other natural disasters, they are nearly impossible to track. For the most part, we are able to track how tectnotic plates move, and then as a result, predict tsunamis.
The Tsunami data is from: https://hifld-geoplatform.opendata.arcgis.com/datasets/historical-tsunami-event-locations
The tutorials I went through to make the Shiny App: https://shiny.rstudio.com/tutorial/written-tutorial/lesson1/ https://rmarkdown.rstudio.com/authoring_shiny_prerendered.html#overview https://bookdown.org/weicheng/shinyTutorial/
There was a lot of overlap between them, but having the different tutorials to go through was really helpful in seeing the depth of the knowledge. I tried to finish them by the end of March so that I’ll have majority of the general knowledge to make the app. As it would turn out, Spring Break was a ride and I got delayed (among other things).
Tutorials for Leaflet (Map): https://rstudio.github.io/leaflet/
I’ve had some background in Leaflet, but not in R. I’ve used Leaflet in JS (very sad experience), so I had a lot of trouble breaking out of old habits.
Importing the libraries and defining the dataset names so we can refer to it.
This is a map of all the tsunamis that have ever been recorded. They are grouped by regions. Hovering over the numerical points will show the amount of tsunamis are in that area. Blue points are the actual tsunami points, or their origin point. Interaction of the blue points will show the year that the tsunami is recorded to occur.
Here’s a barplot of the frequency of mangnitude of all the tsunamis.
There’s an on-going debate that climate change and global warming is causing more natural disasters to occur in the world. The end of the industrial revolution was about 1820-1840.